added samples
[windows-sources.git] / sdk / samples / all in on code / Visual Studio 2010 / VBASPNETShowSpinnerImage / My Project / Settings.Designer.vb
blobba10488a8b158d7760f66a514ec227d4a3c1570e
1 '------------------------------------------------------------------------------
2 ' <auto-generated>
3 ' This code was generated by a tool.
5 ' Changes to this file may cause incorrect behavior and will be lost if
6 ' the code is regenerated.
7 ' </auto-generated>
8 '------------------------------------------------------------------------------
10 Option Strict On
11 Option Explicit On
14 Namespace My
16 <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
17 Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "10.0.0.0"), _
18 Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
19 Partial Friend NotInheritable Class MySettings
20 Inherits Global.System.Configuration.ApplicationSettingsBase
22 Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings)
24 #Region "My.Settings Auto-Save Functionality"
25 #If _MyType = "WindowsForms" Then
26 Private Shared addedHandler As Boolean
28 Private Shared addedHandlerLockObject As New Object
30 <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
31 Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
32 If My.Application.SaveMySettingsOnExit Then
33 My.Settings.Save()
34 End If
35 End Sub
36 #End If
37 #End Region
39 Public Shared ReadOnly Property [Default]() As MySettings
40 Get
42 #If _MyType = "WindowsForms" Then
43 If Not addedHandler Then
44 SyncLock addedHandlerLockObject
45 If Not addedHandler Then
46 AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
47 addedHandler = True
48 End If
49 End SyncLock
50 End If
51 #End If
52 Return defaultInstance
53 End Get
54 End Property
55 End Class
56 End Namespace
58 Namespace My
60 <Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
61 Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
62 Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
63 Friend Module MySettingsProperty
65 <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
66 Friend ReadOnly Property Settings() As Global.VBASPNETShowSpinnerImage.My.MySettings
67 Get
68 Return Global.VBASPNETShowSpinnerImage.My.MySettings.Default
69 End Get
70 End Property
71 End Module
72 End Namespace